program test1;

uses
  Vcl.Forms,
  connSQL in 'connSQL.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.Run;
  D := connectSQL.Create('test.ini');
end.
